home *** CD-ROM | disk | FTP | other *** search
/ Graphics & Sound Program…ng Techniques for the Mac / Graphics and Sound Programming Techniques for the Mac.iso / M&T Graphics & Sound Examples / Symantec Versions / C07 QuickTime Movies / P05 Movie Looping / MovieLooping.c next >
Encoding:
C/C++ Source or Header  |  1995-08-31  |  3.1 KB  |  123 lines  |  [TEXT/KAHL]
  1. //____________________________________________________________
  2. //    MovieLooping.c
  3. //
  4. //    Copyright © Dan Parks Sydow, 1995
  5. //    From the book:
  6. //    "Graphics and Sound Programming Techniques for the Mac",
  7. //    M&T Books, 1995
  8.  
  9.  
  10. //____________________________________________________________
  11.  
  12. #include <Movies.h>   
  13.  
  14.  
  15. //____________________________________________________________
  16.  
  17. void  InitializeAllToolboxes( void );
  18.  
  19.  
  20. //____________________________________________________________
  21.  
  22. #define      rMovieWindow           128
  23. #define      kMovieName        "\pRobot"
  24.  
  25.  
  26. //____________________________________________________________
  27.  
  28. void  main( void )
  29. { 
  30.    OSErr            theError;
  31.    FSSpec           theFSSpec;
  32.    short            theFileRefNum;
  33.    Movie            theMovie;
  34.    short            theMovieResID = 0;   
  35.    Str255           theMovieResName;
  36.    Boolean          wasAltered;
  37.    WindowPtr        theWindow;
  38.    Rect             theMovieBox;
  39.    Rect             theBoundsRect;
  40.    MovieController  theController = nil;
  41.    EventRecord      theEvent;
  42.    Boolean          isControllerEvent;
  43.    Boolean          allDone = false;
  44.  
  45.    InitializeAllToolboxes();
  46.    
  47.    theError = FSMakeFSSpec( 0, 0, kMovieName, &theFSSpec );
  48.    theError = OpenMovieFile( &theFSSpec, &theFileRefNum, fsRdPerm );
  49.    theError = NewMovieFromFile( &theMovie, theFileRefNum, &theMovieResID,
  50.                                  theMovieResName, newMovieActive, &wasAltered );
  51.                                          
  52.    CloseMovieFile( theFileRefNum );
  53.    
  54.    theWindow = GetNewCWindow( rMovieWindow, nil, (WindowPtr)-1L );   
  55.  
  56.    SetMovieGWorld( theMovie, (CGrafPtr)theWindow, nil );   
  57.  
  58.    GetMovieBox( theMovie, &theMovieBox );
  59.  
  60.    theController = NewMovieController( theMovie, &theMovieBox, mcTopLeftMovie);   
  61.  
  62.    MCDoAction( theController, mcActionSetLooping, (Ptr)true );  // ** NEW CODE **
  63.  
  64.    MCGetControllerBoundsRect( theController, &theBoundsRect );
  65.  
  66.    SizeWindow( theWindow, theBoundsRect.right, theBoundsRect.bottom, true );  
  67.    ShowWindow( theWindow );
  68.  
  69.    while ( allDone == false )
  70.    {
  71.       WaitNextEvent( everyEvent, &theEvent, 15L, nil );
  72.       
  73.       if ( theController == nil )
  74.          isControllerEvent = false;
  75.       else
  76.          isControllerEvent = MCIsPlayerEvent( theController, &theEvent );
  77.       
  78.       if ( isControllerEvent == false )
  79.       {
  80.          switch ( theEvent.what )
  81.          {
  82.             case keyDown:
  83.                allDone = true;
  84.                break;
  85.          }
  86.       }
  87.    }
  88.  
  89.    DisposeMovieController( theController );
  90.    theController = nil;
  91.    DisposeMovie( theMovie );
  92.    DisposeWindow( theWindow );
  93. }
  94.  
  95.  
  96. //____________________________________________________________
  97.  
  98. void  InitializeAllToolboxes( void )
  99. {
  100.    OSErr  theError;
  101.    long   theResult;
  102.  
  103.    InitGraf( &qd.thePort );
  104.    InitFonts();
  105.    InitWindows();
  106.    InitMenus();
  107.    TEInit();
  108.    InitDialogs( 0L );
  109.    FlushEvents( everyEvent, 0 );
  110.    InitCursor();
  111.  
  112.    theError = Gestalt( gestaltQuickTime, &theResult );
  113.    if ( theError != noErr )
  114.       ExitToShell();
  115.                                                  
  116.    theError = EnterMovies();  
  117.    if ( theError != noErr )
  118.       ExitToShell(); 
  119. }
  120.  
  121.  
  122.  
  123.